From: Eli Zaretskii <eliz@gnu.org>
Date: Fri, 1 Mar 2002 11:43:39 +0000 (+0000)
Subject: (mouse-show-mark): Use display-mouse-p, not display-graphic-p,
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1^2~5^2~58511
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=7948c2483add543d8c2500d4eb73899bd35bd8bd;p=emacs.git

(mouse-show-mark): Use display-mouse-p, not display-graphic-p,
to decide whether to move point or use the highlighting.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index d4af5ae71ad..7097d45e1f3 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2002-03-01  Eli Zaretskii  <eliz@is.elta.co.il>
+
+	* mouse.el (mouse-show-mark): Use display-mouse-p, not
+	display-graphic-p, to decide whether to move point or use the
+	highlighting.
+
 2002-02-28  Colin Walters  <walters@verbum.org>
 
 	* eshell/esh-var.el (eshell-parse-variable-ref): Use
diff --git a/lisp/mouse.el b/lisp/mouse.el
index 9ac786a5cb7..9d9bee17005 100644
--- a/lisp/mouse.el
+++ b/lisp/mouse.el
@@ -1007,7 +1007,7 @@ If DIR is positive skip forward; if negative, skip backward."
 (defun mouse-show-mark ()
   (if transient-mark-mode
       (delete-overlay mouse-drag-overlay)
-    (if (not (display-graphic-p))
+    (if (not (display-mouse-p))
 	(save-excursion
 	  (goto-char (mark t))
 	  (sit-for 1))